home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / vmed.arc / VMTRACE.CCC < prev   
Encoding:
Text File  |  1985-12-03  |  896 b   |  39 lines

  1. /*    vmtrace/ccc - 02/29/84 - jim kyle
  2.  *
  3.  *    used to debug VM modules; displays report of
  4.  *    critical variables on screen. called from many
  5.  *    points in VM package; VMED10 contains a null
  6.  *    version normally used, VMTRACE/CCC is #INCLUDEd
  7.  *    instead for debugging.
  8.  */
  9. t_r(s) char *s;        /* identify reporting point */
  10. {    printf("\n%s:\n",s);
  11.     t_pl();
  12.     zpaws();
  13. }
  14.  
  15. t_pl()            /* display values */
  16. {    t_x("prev",*Pvptr);
  17.     t_x("curr",Curr);
  18.     t_x("next",*Nxptr);
  19.     putchar('\n');
  20.     t_d("flcb",Flcb);
  21.     t_d("c_ln",Cur_ln);
  22.     t_d("llcb",Llcb);
  23.     putchar('\n');
  24.     t_x("cl len",getwd(clad()));
  25.     t_x("cl adr",clad());
  26.     t_x("eob adr",eob());
  27.     t_x("blk siz",*Bcptr);
  28.     putchar('\n');
  29. }
  30.  
  31. zpaws()            /* wait for user to press ENTER */
  32. {    while (getchar() != '\n') ;    }
  33.  
  34. t_x(s,n)    int n;    char *s;
  35. {    printf("%s:%04x ",s,n);    }
  36.  
  37. t_d(s,n)    char *s;    int n;
  38. {    printf("%s:%-4d ",s,n);    }
  39.